home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
aie9009.zip
/
FRAMES.ZIP
/
LOG.LOG
< prev
next >
Wrap
Text File
|
1990-09-04
|
555b
|
18 lines
Knowledge base : Knowledge base read in.
C1: Setbacks OK?
( y = yes, n = no, d = don't know ) : y
C2: Adequate number of parking stalls?
( y = yes, n = no, d = don't know ) : n
Listing of statement / 1 :
statement([description : score,
value_type : boolean,
dont_ask : true,
goal : true,
already_tried : true,
value : 1]).
statement([description : $C2: Adequate number of parking stalls$,value : no]).
statement([description : $C1: Setbacks OK$,value : yes]) :- true.